Module ModuleCatalogo
    Sub nuevoCatalogo()
        FormCatalogo.Text = "Agregar Catalogo"
        FormCatalogo.btnCatalogoAceptar.Text = "Agregar"
        FormCatalogo.ShowDialog()
    End Sub
    Sub modificarCatalogo()
        With FormCatalogo
            .Text = "Modificar Catalogo"
            .btnCatalogoAceptar.Text = "Modificar"
            .comboTipoDocumento.Enabled = False
            .lblFechaAltaCatalogo.Enabled = False
            .lblFechaActual.Enabled = False
            .lblImporteCatalogo.Enabled = False
            .txtImporte.Enabled = False

            .ShowDialog()
        End With
    End Sub


    Sub lecturas()
        FormPrincipal.CRV.DisplayGroupTree = False
        FormPrincipal.CRV.DisplayStatusBar = False
        FormPrincipal.CRV.ShowCloseButton = True
        FormPrincipal.CRV.Visible = True
        FormPrincipal.menuBuscar.Visible = False
        FormPrincipal.panelCatalogo1.Visible = False
        FormPrincipal.CRV.Dock = DockStyle.Fill
    End Sub
End Module
